#include <stdio.h>
#include <conio.h>
#include <exception>
#include <vector>
#include <winsock2.h>
#include <ws2tcpip.h>

using namespace std;

#pragma comment (lib, "Ws2_32.lib")
#pragma comment (lib, "Mswsock.lib")
#pragma comment (lib, "Advapi32.lib")

typedef unsigned int uint;
#define LOGF			printf
#define LOG_VALUE(val)	log_value(#val, val)
#define LOG_INIT(s)		printf("INIT : %s\r\n", s)
#define LOG_SHUTDOWN(s)	printf("SHUTDOWN : %s\r\n", s)

inline void log_value(const char *name, int   val)			{ LOGF("%-30s = %d\r\n", name, val); }
inline void log_value(const char *name, float val)			{ LOGF("%-30s = %f\r\n", name, val); }
inline void log_value(const char *name, const char *val)	{ LOGF("%-30s = %s\r\n", name, val); }


#include "..\udp_sv\net_helper.h"
#include "..\udp_sv\net_shared.h"


class EClient {
	public:
				EClient		( void );
				~EClient	( void );
		void	Connect		( const char *addr, uint port );
		void	Frame		( void );
	protected:
		SOCKET		conn_socket;
		sockaddr_in conn_address;
	};


EClient::EClient(void)
{
	WSAData	wsa_data;
	memset(&wsa_data, 0, sizeof(wsa_data));
	WSAStartup(MAKEWORD(2, 2), &wsa_data);
	
	
}


EClient::~EClient(void)
{
}


void EClient::Connect(const char *addr, uint port)
{
	unsigned long enable = 1;
	int one = 1;

    struct addrinfo *result = NULL;
    struct addrinfo *ptr    = NULL;
    struct addrinfo	hints;

    ZeroMemory( &hints, sizeof(hints) );
    hints.ai_family = AF_UNSPEC;
    hints.ai_socktype = SOCK_STREAM;
    hints.ai_protocol = IPPROTO_TCP;

    // Resolve the server address and port
	char port_str[20];
    sprintf(port_str, "%d", port);
    
    CHECK_WSA( getaddrinfo(addr, port_str, &hints, &result) )

    for( ptr=result; ptr != NULL; ptr=ptr->ai_next ) {
		memcpy(&conn_address, ptr->ai_addr, sizeof(conn_address));
		LOGF("found : %d:%s\r\n", conn_address.sin_port, inet_ntoa(conn_address.sin_addr));
    }


    for( ptr=result; ptr != NULL; ptr=ptr->ai_next ) {

        // Create a SOCKET for connecting to server
        conn_socket = socket(ptr->ai_family, ptr->ai_socktype, ptr->ai_protocol);
		CHECK_SOCKET( conn_socket );
		
		memcpy(&conn_address, ptr->ai_addr, sizeof(conn_address));

        // Connect to server.
        LOGF("connecting to : %d:%s\r\n", conn_address.sin_port, inet_ntoa(conn_address.sin_addr));
        int res = connect( conn_socket, ptr->ai_addr, (int)ptr->ai_addrlen);
        
        if (res == SOCKET_ERROR) {
            closesocket(conn_socket);
            conn_socket = INVALID_SOCKET;
            continue;
        }

		CHECK_WSA( ioctlsocket( conn_socket, FIONBIO, &enable ) );
        LOGF("connected!\r\n");
        break;
    }
	
}


void EClient::Frame(void)
{
	char msg[] = "blah-blah-blah! ololo!!!";
	Sleep(2000);
	
	int r = send(conn_socket, msg, sizeof(msg), 0);
	
	if (r==SOCKET_ERROR) {
		throw exception(NET_ErrorString());
	}
	
	LOGF("%d bytes sent\r\n", r);

	//----------------------------

	ENetPacket_s packet;
	packet.Fill(0);
	
	r = recv( conn_socket, (char*)&packet, MAX_PACKET_SIZE, 0);
	
	if (r==SOCKET_ERROR) {
		if (WSAGetLastError()!=WSAEWOULDBLOCK) {
			throw exception(NET_ErrorString());
		}
	} else {
		LOGF("received data : %d [%s...]\r\n", r, packet.data);
	}
}




int __cdecl main(int argc, char **argv) 
{
	try {
		EClient cl;
		
		LOGF("connecting %s\r\n", argv[1]);
		cl.Connect(argv[1], 12345);
		//cl.Connect("127.0.0.1", 12345);

		while (true) {		
			cl.Frame();
		}

	} catch (exception &e) {
		LOGF("Error : %s\r\n", e.what());
	}	
	getch();	//*/
	
    /*WSADATA wsaData;
    SOCKET ConnectSocket = INVALID_SOCKET;
    struct addrinfo *result = NULL,
                    *ptr = NULL,
                    hints;
    char *sendbuf = "this is a test";
    char recvbuf[DEFAULT_BUFLEN];
    int iResult;
    int recvbuflen = DEFAULT_BUFLEN;
    
    // Validate the parameters
    if (argc != 2) {
        printf("usage: %s server-name\n", argv[0]);
        return 1;
    }

    // Initialize Winsock
    iResult = WSAStartup(MAKEWORD(2,2), &wsaData);
    if (iResult != 0) {
        printf("WSAStartup failed: %d\n", iResult);
        return 1;
    }

    ZeroMemory( &hints, sizeof(hints) );
    hints.ai_family = AF_UNSPEC;
    hints.ai_socktype = SOCK_STREAM;
    hints.ai_protocol = IPPROTO_TCP;

    // Resolve the server address and port
    iResult = getaddrinfo(argv[1], DEFAULT_PORT, &hints, &result);
    if ( iResult != 0 ) {
        printf("getaddrinfo failed: %d\n", iResult);
        WSACleanup();
        return 1;
    }

    // Attempt to connect to an address until one succeeds
    for(ptr=result; ptr != NULL ;ptr=ptr->ai_next) {

        // Create a SOCKET for connecting to server
        ConnectSocket = socket(ptr->ai_family, ptr->ai_socktype, 
            ptr->ai_protocol);
        if (ConnectSocket == INVALID_SOCKET) {
            printf("Error at socket(): %ld\n", WSAGetLastError());
            freeaddrinfo(result);
            WSACleanup();
            return 1;
        }

        // Connect to server.
        iResult = connect( ConnectSocket, ptr->ai_addr, (int)ptr->ai_addrlen);
        if (iResult == SOCKET_ERROR) {
            closesocket(ConnectSocket);
            ConnectSocket = INVALID_SOCKET;
            continue;
        }
        break;
    }

    freeaddrinfo(result);

    if (ConnectSocket == INVALID_SOCKET) {
        printf("Unable to connect to server!\n");
        WSACleanup();
        return 1;
    }

    // Send an initial buffer
    iResult = send( ConnectSocket, sendbuf, (int)strlen(sendbuf), 0 );
    if (iResult == SOCKET_ERROR) {
        printf("send failed: %d\n", WSAGetLastError());
        closesocket(ConnectSocket);
        WSACleanup();
        return 1;
    }

    printf("Bytes Sent: %ld\n", iResult);

    // shutdown the connection since no more data will be sent
    iResult = shutdown(ConnectSocket, SD_SEND);
    if (iResult == SOCKET_ERROR) {
        printf("shutdown failed: %d\n", WSAGetLastError());
        closesocket(ConnectSocket);
        WSACleanup();
        return 1;
    }

    // Receive until the peer closes the connection
    do {

        iResult = recv(ConnectSocket, recvbuf, recvbuflen, 0);
        if ( iResult > 0 )
            printf("Bytes received: %d\n", iResult);
        else if ( iResult == 0 )
            printf("Connection closed\n");
        else
            printf("recv failed: %d\n", WSAGetLastError());

    } while( iResult > 0 );

    // cleanup
    closesocket(ConnectSocket);
    WSACleanup();   */

    return 0;	   
}
